home *** CD-ROM | disk | FTP | other *** search
- object ImageForm: TImageForm
- Left = 201
- Top = 98
- ActiveControl = FileEdit
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Select Image'
- ClientHeight = 262
- ClientWidth = 485
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = True
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object PathLabel: TLabel
- Left = 158
- Top = 27
- Width = 146
- Height = 15
- AutoSize = False
- Caption = 'D:\Input\DLLDistributions'
- end
- object ImageName: TLabel
- Left = 319
- Top = 13
- Width = 57
- Height = 13
- Caption = 'ImageName'
- end
- object Label2: TLabel
- Left = 4
- Top = 216
- Width = 81
- Height = 13
- Caption = 'List files of &type: '
- FocusControl = FilterCombo
- end
- object Label3: TLabel
- Left = 158
- Top = 216
- Width = 36
- Height = 13
- Caption = 'Dri&ves: '
- FocusControl = DriveCombo
- end
- object Label4: TLabel
- Left = 4
- Top = 8
- Width = 54
- Height = 13
- Caption = 'File &name: '
- FocusControl = FileEdit
- end
- object Label5: TLabel
- Left = 158
- Top = 8
- Width = 43
- Height = 13
- Caption = '&Folders: '
- FocusControl = DirectoryList
- end
- object PreviewBtn: TRxSpeedButton
- Left = 455
- Top = 4
- Width = 24
- Height = 23
- Hint = 'Preview|'
- Enabled = False
- Flat = True
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDD0000DD00DDDDDDDDDDDDDDDD0000D0000DDDDDDDDDDDDDDD0000D0F0
- 00DDDDDDDDDDDDDD0000DD0F000DDDDDDDDDDDDD0000DDD0F000DDDDDDDDDDDD
- 0000DDDD0F00000008DDDDDD0000DDDDD0F008000800000D0000DDDDDD0080FF
- FE80FE0D0000DDDDDD08D0EF0FE88F0D0000DDDDDD08D0F000FE0E0D0000DDDD
- DD08D880E00F0F0D0000DDDDDD08DFFEFE000E0D0000DDDDDD888FFFEFE88F0D
- 0000DDDDDDD08DFEFE80FE0D0000DDDDDDDD0D6D6D00000D0000DDDDDDDDD800
- 08F0E0DD0000DDDDDDDDD0EFEFE00DDD0000DDDDDDDDD0000000DDDD0000DDDD
- DDDDDDDDDDDDDDDD0000}
- Layout = blGlyphLeft
- OnClick = PreviewBtnClick
- end
- object DirectoryList: TDirectoryListBox
- Left = 158
- Top = 51
- Width = 148
- Height = 162
- DirLabel = PathLabel
- FileList = FileListBox
- ItemHeight = 16
- TabOrder = 2
- OnChange = FileListBoxClick
- end
- object DriveCombo: TDriveComboBox
- Left = 158
- Top = 233
- Width = 148
- Height = 19
- DirList = DirectoryList
- TabOrder = 4
- end
- object FileEdit: TEdit
- Left = 4
- Top = 24
- Width = 146
- Height = 21
- TabOrder = 0
- Text = '*.bmp;*.ico;*.wmf'
- end
- object ImagePanel: TPanel
- Left = 315
- Top = 32
- Width = 164
- Height = 160
- BevelInner = bvLowered
- BevelOuter = bvNone
- TabOrder = 5
- object Image: TImage
- Left = 1
- Top = 1
- Width = 162
- Height = 158
- Align = alClient
- Center = True
- end
- end
- object FileListBox: TFileListBox
- Left = 4
- Top = 51
- Width = 146
- Height = 148
- FileEdit = FileEdit
- FileType = [ftReadOnly, ftHidden, ftNormal]
- IntegralHeight = True
- ItemHeight = 16
- Mask = '*.bmp;*.ico;*.wmf'
- ShowGlyphs = True
- TabOrder = 1
- OnChange = FileListBoxChange
- OnClick = FileListBoxClick
- OnDblClick = FileListBoxDblClick
- end
- object FilterCombo: TFilterComboBox
- Left = 4
- Top = 233
- Width = 146
- Height = 21
- FileList = FileListBox
- Filter =
- 'Image Files (*.bmp, *.ico, *.wmf)|*.bmp;*.ico;*.wmf|Bitmap Files' +
- ' (*.bmp)|*.bmp|Icons (*.ico)|*.ico|Metafiles (*.wmf)|*.wmf|All f' +
- 'iles (*.*)|*.*'
- TabOrder = 3
- OnChange = FileListBoxClick
- end
- object StretchCheck: TCheckBox
- Left = 321
- Top = 198
- Width = 116
- Height = 15
- Caption = ' &Stretch '
- TabOrder = 6
- OnClick = StretchCheckClick
- end
- object OkBtn: TButton
- Left = 318
- Top = 228
- Width = 77
- Height = 25
- Caption = 'OK'
- Default = True
- TabOrder = 7
- OnClick = OkBtnClick
- end
- object CancelBtn: TButton
- Left = 401
- Top = 228
- Width = 77
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 8
- end
- object FilePics: TPicClip
- Cols = 11
- Picture.Data = {<image001.bmp>}
- Left = 244
- Top = 6
- end
- object FormStorage: TFormStorage
- IniFileName = 'DELPHI.INI'
- IniSection = 'RX.ImagePreview'
- StoredProps.Strings = (
- 'StretchCheck.Checked')
- StoredValues = <>
- Left = 272
- Top = 6
- end
- end
-